home *** CD-ROM | disk | FTP | other *** search
- .key an/a
-
- if <an> eq info
- echo "0: floor without axes"
- echo "1: floor with axes"
- echo "2: floor to use with fisheye"
- echo "3: filled chess floor"
- echo "4: filled star floor"
- echo "5: hill"
- echo "6: round floor with axes"
- echo "7: filled round floor"
- echo "8: filled round floor with rose"
- echo "9: mini floor (1 square meter)"
- echo "10:great chess floor (to use with shadows)"
- echo "11:giant chess floor (to slow down the program)"
- quit
- endif
-
-
- cd o/basic
-
- if <an> eq 0
- copy karoboden_ohne_axn Karoboden
- echo "floor without axes"
- endif
- if <an> eq 1
- copy karoboden_mit_axn Karoboden
- echo "floor with axes"
- endif
- if <an> eq 2
- copy karoboden_unterteilt Karoboden
- echo "floor to use with fisheye"
- endif
- if <an> eq 3
- copy karoboden_schach Karoboden
- echo "filled chess floor"
- endif
- if <an> eq 4
- copy karoboden_Stern Karoboden
- echo "filled star floor"
- endif
- if <an> eq 5
- copy karoboden_Hügel Karoboden
- echo "hill"
- endif
- if <an> eq 6
- copy karoboden_Rund_Axn Karoboden
- echo "round floor with axes"
- endif
- if <an> eq 7
- copy karoboden_Rund_gefüllt Karoboden
- echo "filled round floor"
- endif
- if <an> eq 8
- copy karoboden_Rund_Rose Karoboden
- echo "filled round floor with rose"
- endif
- if <an> eq 9
- copy karoboden_Mini Karoboden
- echo "mini floor (1qm)"
- endif
- if <an> eq 10
- copy karoboden_gross Karoboden
- echo "great chess floor (to use with shadows)"
- endif
- if <an> eq 11
- copy Karoboden_fein Karoboden
- echo "giant chess floor (to slow down the program)"
- endif
- cd //
-